Contents:
subs [] = [[]] subs (x:xs) = yss ++ map (x:) yss where yss = subs xs
-- subs [1,2] [[]] ++ map (2:) [[]]
これはすぐわかる [[2]]
[[2]]
map部分がわかったので、これもすぐわかる
[[]] ++ [[2]] -> [[], [2]]
[[]] ++ [[2]]
[[], [2]]